home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Almathera Ten Pack 3: CDPD 3
/
Almathera Ten on Ten - Disc 3: CDPD3.iso
/
fish
/
001-100
/
001-025
/
023
/
ver30
/
sys
/
amiga
/
spawn.c
< prev
next >
Wrap
C/C++ Source or Header
|
1995-03-17
|
872b
|
38 lines
/*
* Name: MicroEMACS
* Spawn an AmigaDOS subprocess
* Version: 31
* Last edit: 17-Apr-86
* By: ...!ihnp4!seismo!ut-sally!ut-ngp!mic
*/
#include <libraries/dos.h>
#include <libraries/dosextens.h>
#undef TRUE
#undef FALSE
#include "def.h" /* AFTER system files to avoid redef's */
/*
* Create a subjob with a copy
* of the command intrepreter in it. Since the command
* interpreter doesn't run in the same window, there's no
* need for a refresh. Ah, the beauties of windowing system...
*/
spawncli(f, n, k)
{
struct FileHandle *newcli, *Open();
eprintf("[Starting new CLI]");
newcli = Open("CON:1/1/639/199/MicroEmacs Subprocess",
MODE_NEWFILE);
if (newcli == (struct FileHandle *) 0) {
eprintf("Can't create new CLI window");
return (FALSE);
}
Execute("", newcli, 0L);
Close(newcli);
return (TRUE);
}